home *** CD-ROM | disk | FTP | other *** search
/ Disc Station 13 / Disc Station Vol 13.iso / menu / startup.mct < prev    next >
Text File  |  1996-10-30  |  32KB  |  1,142 lines
  1. ; TAB 4
  2.  
  3. ;++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  4. ;    DSmenu installer controler 'Artysia' menu version
  5. ;
  6. ;    1996  Programed by Nozomi
  7. ;++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  8.  
  9. ;/////////////////////////////////////
  10. ;
  11. ;    âCâôâXâgü[âïëµû╩é╠ôoÿ^
  12. ;
  13. ;/////////////////////////////////////
  14.  
  15. @Effect 20, 245, 8
  16. @sndload DSmenu.mlk
  17. $snd = 0
  18. @snd $snd
  19. @pcmload DSmenu.wlk
  20.  
  21. @INSTgrp    popup13, (20, 15), 32    ; âCâôâXâgü[âïÄ₧é╔ò\Īé╖éΘâOâëâtâBâbâNé╠âìü[âh
  22. @INSTmater    mater13, 34, 3, 32        ; âCâôâXâgü[âïÅ≤æ╘é╠ò\Īâüü[â^ü[é╠âìü[âh
  23. @INSTmaterSet    (2, 20)                ; âüü[â^ü[é╠ò\Īê╩Æu
  24. @INSTchr    puyo13, 8, 7, 32, 142    ; âüü[â^ü[Åπé≡ô«é¡âLâââëé╠âìü[âh
  25. @INSTchrSet    0, 3, 0, 2, 1, 3, 4, 2, 1    ; âAâjâüÉ▌ÆΦ ê┌ô«Æå
  26. @INSTchrSet    1, 3, 0, 2, 1, 3, 4, 2, 1    ; âAâjâüÉ▌ÆΦ ÅIù╣
  27. @INSTmess    instme13, (0, 1), 40, 4, 32, 142    ; âCâôâXâgü[âïÆåé╚é╟é╠âüâbâZü[âWé╠âìü[âh
  28. @INSTmessSet    0, 12, 0            ; âCâôâXâgü[âïÆå
  29. @INSTmessSet    1, 12, 1            ; âCâôâXâgü[âïÅIù╣
  30. @INSTmessSet    2, 12, 2            ; âAâôâCâôâXâgü[âïÆå
  31. @INSTmessSet    3, 12, 3            ; âAâôâCâôâXâgü[âïÅIù╣
  32. @INSTmessSet    4, 12, 4            ; âZü[âuâfü[â^æ▐ö≡Æå
  33. @INSTmessSet    5, 12, 5            ; âZü[âuâfü[â^æ▐ö≡ÅIù╣
  34. @INSTmessSet    6, 12, 6            ; âZü[âuâfü[â^ò£î│Æå
  35. @INSTmessSet    7, 12, 7            ; âZü[âuâfü[â^ò£î│ÅIù╣
  36. @INSTmessSet    8, 12, 8            ; âüâjâàü[âCâôâXâgü[âïÆå
  37. @INSTmessSet    9, 12, 9            ; âüâjâàü[âCâôâXâgü[âïÅIù╣
  38.  
  39. @INSTmodeLoad mode13, (20, 0), 40, 4, 32, 142        ; âéü[âhò\Īùpébéfâìü[âh
  40. @INSTmodeSet    0, 1, 0                ; âCâôâXâgü[âïü^ïNô«âéü[âh
  41. @INSTmodeSet    1, 1, 1                ; âQü[âÇâfü[â^æ▐ö≡âéü[âh
  42. @INSTmodeSet    2, 1, 3                ; âQü[âÇâfü[â^ò£î│âéü[âh
  43. @INSTmodeSet    3, 1, 2                ; âAâôâCâôâXâgü[âïâéü[âh 
  44.  
  45. ;//////////////////////////////////////////////////////////////////
  46. ;
  47. ;    âVâXâeâÇÅεò±é╠É▌ÆΦ
  48. ;
  49. ;/////////////////////////////////////////////////////////////////
  50.  
  51. @SYSinstDir DiscStation13            ; âCâôâXâgü[âïâfâBâîâNâgâè
  52. @SYSCDvolume DS13                    ; ébécé╠â{âèâàü[âÇâëâxâï
  53. @SYSappName DiscStation13            ; âAâvâèâPü[âVâçâôû╝
  54. @SYSregKey DS13                        ; âîâWâXâgâèâLü[û╝
  55. @SYSuninst DSshell.exe                ; âAâôâCâôâXâgü[âëü[
  56. @SYSdrvType CD, HD                    ; âCâôâXâgü[âïî│ü^ɵé╠âhâëâCâué╠Äφù▐ Ä⌐ô«îƒì⌡é╡é▄é╖
  57. ;@SYSdrvType MO, HD                    ; âCâôâXâgü[âïî│ü^ɵé╠âhâëâCâué╠Äφù▐ Ä⌐ô«îƒì⌡é╡é▄é╖
  58. @SYSmenuName écérâüâjâàü[            ; âüâjâàü[û╝ âXâ^ü[âgâüâjâàü[é╔ò\Īé│éΩéΘ
  59. @SYSmenuPath InstMenu                ; ébécôαé╠âüâjâàü[é╠éáéΘâfâBâîâNâgâè
  60. @SYSmenu    DSshell.exe                ; âüâjâàü[ïNô«âvâìâOâëâÇ
  61. @SYSload sysico13, 13, 11, 32, 142    ; âVâXâeâÇâAâCâRâôé╠âìü[âh
  62.  
  63. @DRAWdisable                        ; ò`ëµï╓Ä~
  64. @LOGOload logo13, 23, 8, 32, 142    ; âQü[âÇâ^âCâgâïé╠âìü[âh
  65. @MENUload DSgame13, 13, 11, 32, 142    ; âQü[âÇé╠âAâCâRâôé╠âìü[âh
  66. @Wall main13 ,32                    ; ò╟Äåâìü[âh
  67.  
  68. @GOSUB :sysiconinit                    ; âVâXâeâÇâAâCâRâôé╠É▌ÆΦ
  69. @GOSUB :gameinit                    ; âQü[âÇâfü[â^é╠É▌ÆΦ
  70. @DRAWenable                            ; ò`ëµïûë┬
  71.  
  72. $start = 0
  73.  
  74. ;//////////////////////////////////////////////////////////////////////
  75. ;
  76. ;    âüâCâôâïü[âv
  77. ;
  78. ;/////////////////////////////////////////////////////////////////////
  79.  
  80. :init
  81.  
  82. @DRAWdisable                        ; ò`ëµï╓Ä~
  83.  
  84. @INSTmode $mode                        ; âüâjâàü[âéü[âhé╠ò\Ī
  85.  
  86. @GOSUB :sysiconset                    ; âVâXâeâÇâAâCâRâôé╠ò\Ī
  87.  
  88. @GOSUB :HeartSetInst                ; âQü[âÇâAâCâRâôé╠ò\Īü^É▌ÆΦ
  89. @GOSUB :ARLESetInst                    ; 
  90. @GOSUB :HeroSetInst                    ; 
  91. @GOSUB :OpmonSetInst                    ; 
  92. @GOSUB :NPSetInst                    ; 
  93. @GOSUB :DF3SetInst                    ; 
  94. @GOSUB :AnimeSetInst                ;
  95. @GOSUB :MovieSetInst                ;
  96.  
  97. @IF $start != 0 :loopA
  98. @DRAWenable                            ; ò`ëµïûë┬
  99. @Effect 20, 245, 10
  100. $start = 1
  101.  
  102. :loopA
  103.  
  104. @DRAWenable                            ; ò`ëµïûë┬
  105.  
  106. :loop                                ; é▒é╠éQìsé≡ëäüXé╞ë±éΦæ▒é»é▄é╖ é╜é╛ëäüXé╞üEüEüE
  107. @ICONenable
  108. @Goto :loop                            ; üié╜é╛é╡üAâAâCâRâôé≡âNâèâbâNé╖éΘé▄é┼üj
  109.  
  110. :inst
  111. @IF $mode == 0 :loop
  112. @pcm 0
  113. ;@IF $snd == 0 :instbgm
  114. ;@SNDfade 1
  115. ;@for 30
  116. ;@next
  117. ;$snd = 0
  118. ;@snd $snd
  119. ;:instbgm
  120. $mode = 0                            ; âCâôâXâgü[âïü^ïNô«âéü[âh
  121. @GOTO :init
  122.  
  123. :store
  124. @IF $mode == 1 :loop
  125. @pcm 0
  126. $mode = 1                            ; âQü[âÇâfü[â^æ▐ö≡âéü[âh
  127. @GOTO :init
  128.  
  129. :restore
  130. @IF $mode == 2 :loop
  131. @pcm 0
  132. $mode = 2                            ; âQü[âÇâfü[â^ò£î│âéü[âh
  133. @GOTO :init
  134.  
  135. :uninst
  136. @IF $mode == 3 :loop
  137. @pcm 0
  138. ;@IF $snd == 1 :uninstbgm
  139. ;@SNDfade 1
  140. ;@for 30
  141. ;@next
  142. ;$snd = 1
  143. ;@snd $snd
  144. ;:uninstbgm
  145. $mode = 3                            ; âAâôâCâôâXâgü[âïâéü[âh
  146. @GOTO :init
  147.  
  148. :exit
  149. @pcm 0
  150. @END                                ; écérâüâjâàü[é╠ÅIù╣
  151.  
  152.  
  153. ;///////////////////////////////////////////////////////////////////////
  154. ;
  155. ;    âVâXâeâÇâAâCâRâôé╠É▌ÆΦ
  156. ;
  157. ;//////////////////////////////////////////////////////////////////////
  158.  
  159. :sysiconinit
  160.  
  161. @MENUset exit(0), 1, 5, 4             ; ÅIù╣âAâCâRâôé╠É▌ÆΦ
  162. @MENUlogoSet (29, 38), 17            ; ÅIù╣âìâSé╠ê╩ÆuÉ▌ÆΦ
  163. @MENUset store(0), 1, 5, 2            ; æ▐ö≡âAâCâRâôé╠É▌ÆΦ
  164. @MENUset store(1), 1, 5, 7            ; æ▐ö≡âAâCâRâôé╠É▌ÆΦ
  165. @MENUlogoSet (29, 38), 23            ; æ▐ö≡âìâSé╠ê╩ÆuÉ▌ÆΦ
  166. @MENUset restore(0), 1, 5, 3        ; ò£î│âAâCâRâôé╠É▌ÆΦ
  167. @MENUset restore(1), 1, 5, 8        ; ò£î│âAâCâRâôé╠É▌ÆΦ
  168. @MENUlogoSet (29, 38), 24            ; ò£î│âìâSé╠ê╩ÆuÉ▌ÆΦ
  169. @MENUset uninst(0), 1, 5, 1            ; âAâôâCâôâXâgü[âïâAâCâRâôé╠É▌ÆΦ
  170. @MENUset uninst(1), 1, 5, 6            ; âAâôâCâôâXâgü[âïâAâCâRâôé╠É▌ÆΦ
  171. @MENUlogoSet (29, 38), 22            ; âAâôâCâôâXâgü[âïâìâSé╠ê╩ÆuÉ▌ÆΦ
  172. @MENUset inst(0), 1, 5, 0            ; âCâôâXâgü[âïâAâCâRâôé╠É▌ÆΦ
  173. @MENUset inst(1), 1, 5, 5            ; âCâôâXâgü[âïâAâCâRâôé╠É▌ÆΦ
  174. @MENUlogoSet (29, 38), 21            ; âCâôâXâgü[âïâìâSé╠ê╩ÆuÉ▌ÆΦ
  175. @RET
  176.  
  177.  
  178. :sysiconset
  179.  
  180. @MENUput exit(0), (63, 48)            ; ÅIù╣âAâCâRâôé╠ò\Ī
  181. @MENUlogo exit, 0                    ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
  182. @MENUgoto exit, :exit                ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
  183.  
  184.  
  185. @IF $mode == 1 :store1
  186. @MENUput store(0), (33, 48)            ; æ▐ö≡âAâCâRâôé╠ò\Ī
  187. @Goto :store2
  188. :store1
  189. @MENUput store(1), (33, 48)            ; æ▐ö≡âAâCâRâôé╠ò\Ī
  190. :store2
  191. @MENUlogo store, 0                    ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
  192. @MENUgoto store, :store                ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
  193.  
  194. @IF $mode == 0 :inst1
  195. @MENUput inst(0), (3, 48)            ; âCâôâXâgü[âïâAâCâRâôé╠ò\Ī
  196. @Goto :inst2
  197. :inst1
  198. @MENUput inst(1), (3, 48)            ; âCâôâXâgü[âïâAâCâRâôé╠ò\Ī
  199. :inst2
  200. @MENUlogo inst, 0                    ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
  201. @MENUgoto inst, :inst                ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
  202.  
  203. @IF $mode == 2 :restore1
  204. @MENUput restore(0), (48, 48)        ; ò£î│âAâCâRâôé╠ò\Ī
  205. @Goto :restore2
  206. :restore1
  207. @MENUput restore(1), (48, 48)        ; ò£î│âAâCâRâôé╠ò\Ī
  208. :restore2
  209. @MENUlogo restore, 0                ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
  210. @MENUgoto restore, :restore            ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
  211.  
  212. @IF $mode == 3 :uninst1
  213. @MENUput uninst(0), (18, 48)        ; âAâôâCâôâXâgü[âïâAâCâRâôé╠ò\Ī
  214. @Goto :uninst2
  215. :uninst1
  216. @MENUput uninst(1), (18, 48)        ; âAâôâCâôâXâgü[âïâAâCâRâôé╠ò\Ī
  217. :uninst2
  218. @MENUlogo uninst, 0                    ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
  219. @MENUgoto uninst, :uninst            ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
  220.  
  221. @MENUdisp store, 1                    ; storeâìâSé≡ò\Ī    ûóÄgùp
  222. @MENUdisp restore, 1                ; storeâìâSé≡ò\Ī    ûóÄgùp
  223. @MENUdisp inst, 1                    ; storeâìâSé≡ò\Ī    ûóÄgùp
  224. @MENUdisp uninst, 1                    ; storeâìâSé≡ò\Ī    ûóÄgùp
  225.  
  226. @RET
  227.  
  228. ;////////////////////////////////////////////////////////////////////////
  229. ;
  230. ;    âQü[âÇâAâCâRâôü^Åεò±é╠É▌ÆΦ
  231. ;
  232. ;////////////////////////////////////////////////////////////////////////
  233. :gameinit
  234.  
  235. @MENUset Heart(0), 0, 3, 39, 40, 41, 42    ; âQü[âÇâAâCâRâôé╠É▌ÆΦ    Æ╩Åφ
  236. @MENUset Heart(2), 0, 3, 49, 50, 51, 52    ; âQü[âÇâAâCâRâôé╠É▌ÆΦ    æIæ≡òsë┬
  237. @MENUclip Heart, 0, 0, 104, 88
  238. @MENUlogoSet (29, 38), 36, 14            ; âQü[âÇâìâSé╠ê╩ÆuÉ▌ÆΦ
  239. @GAMEname Heart, ânü[âgâëâôâh            ; âQü[âÇû╝é╠É▌ÆΦ
  240. @GAMEexeFile Heart, NTC96.exe            ; âQü[âÇé╠Ä└ìsâtâ@âCâïû╝é╠É▌ÆΦ
  241. @GAMECDdir Heart, Heart                    ; ébécôαé╠âfâBâîâNâgâèé╠É▌ÆΦ
  242.  
  243. @MENUset DF3(0), 0, 3, 30,31,32,30,30,30,30,30,30,30,30,32,30,32,30,30,30,30,30        ; âQü[âÇâAâCâRâôé╠É▌ÆΦ    Æ╩Åφ
  244. @MENUset DF3(1), 0, 3,  0, 1, 2, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 2, 0, 0, 0, 0, 0        ; âQü[âÇâAâCâRâôé╠É▌ÆΦ  ûóâCâôâXâgü[âï
  245. @MENUset DF3(2), 0, 3, 15,16,17,15,15,15,15,15,15,15,15,17,15,17,15,15,15,15,15        ; âQü[âÇâAâCâRâôé╠É▌ÆΦ  æIæ≡òsë┬
  246. @MENUclip DF3, -48, -32, 96, 128
  247. @MENUlogoSet (29, 38), 36, 0, 3, 6, 9, 28    ; âQü[âÇâìâSé╠ê╩ÆuÉ▌ÆΦ
  248. @GAMEname DF3, écéàéûéëéîü@éeéÅéÆéâéàü@çVü@ü`îòé╞ë╘æ⌐ü`        ; âQü[âÇû╝é╠É▌ÆΦ
  249. @GAMEexeFile DF3, DF3.exe                ; âQü[âÇé╠Ä└ìsâtâ@âCâïû╝é╠É▌ÆΦ
  250. @GAMEexePath DF3, DevilForce3            ; âQü[âÇÄ└ìsÄ₧é╠âpâXé╠É▌ÆΦ
  251. @GAMEsavePath DF3, SaveData                ; âQü[âÇâfü[â^é╠âZü[âuâpâXé╠É▌ÆΦ
  252. @GAMEinstDir DF3, DevilForce3            ; âQü[âÇé≡âCâôâXâgü[âïé╖éΘâfâBâîâNâgâèé╠É▌ÆΦ
  253. @GAMECDdir DF3, DF3                        ; ébécôαé╠âfâBâîâNâgâèé╠É▌ÆΦ
  254.  
  255. @MENUset ARLE(0), 0, 3, 36,36,36,36,36,37,38,38,38,38,37,36,36,36,36,36,36,36,36         ; âQü[âÇâAâCâRâôé╠É▌ÆΦ    Æ╩